home *** CD-ROM | disk | FTP | other *** search
/ Run Magazine ReRun 1986 January & February / rerun-1986-01-02.d64 / basic aid 64 (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  7KB  |  137 lines
  1. 10 data 169,24,141,8,3,169,196,141,9,3,96,169,1128
  2. 20 data 228,141,8,3,169,167,141,9,3,76,116,164,1225
  3. 30 data 160,0,132,11,162,255,232,200,177,122,56,253,1760
  4. 40 data 166,201,240,246,201,128,240,18,232,189,166,201,2228
  5. 50 data 16,250,230,11,160,0,189,167,201,208,227,76,1735
  6. 60 data 228,167,165,11,10,170,189,159,201,72,189,158,1719
  7. 70 data 201,72,96,169,255,208,2,169,0,141,60,3,1376
  8. 80 data 169,8,141,61,3,32,150,196,32,124,198,160,1274
  9. 90 data 4,32,1,197,176,45,32,45,197,173,60,3,965
  10. 100 data 240,9,32,104,197,164,168,144,236,176,28,32,1530
  11. 110 data 146,198,176,23,160,4,206,61,3,208,222,169,1576
  12. 120 data 8,141,61,3,32,148,197,224,89,208,4,160,1275
  13. 130 data 4,208,206,76,116,164,162,0,152,24,101,122,1335
  14. 140 data 133,122,144,2,230,123,32,115,0,240,80,201,1422
  15. 150 data 32,240,247,141,62,3,32,115,0,240,68,205,1385
  16. 160 data 62,3,240,16,157,75,3,232,224,11,208,238,1469
  17. 170 data 32,115,0,205,62,3,208,52,138,240,44,142,1241
  18. 180 data 69,3,173,60,3,208,1,96,162,0,32,115,922
  19. 190 data 0,240,28,205,62,3,240,16,157,85,3,232,1271
  20. 200 data 224,11,208,238,32,115,0,205,62,3,208,12,1318
  21. 210 data 138,240,4,142,70,3,96,104,104,76,8,175,1160
  22. 220 data 104,104,76,113,165,177,170,208,8,32,146,198,1501
  23. 230 data 160,4,144,245,96,162,0,221,75,3,240,3,1353
  24. 240 data 200,208,234,200,232,236,69,3,240,11,177,170,1980
  25. 250 data 240,223,221,75,3,240,240,208,216,132,168,24,1990
  26. 260 data 96,165,170,133,95,165,171,133,96,173,0,3,1400
  27. 270 data 72,173,1,3,72,169,13,32,210,255,169,94,1263
  28. 280 data 141,0,3,169,197,141,1,3,160,1,132,15,963
  29. 290 data 200,177,170,170,200,177,170,133,21,134,20,76,1648
  30. 300 data 232,166,104,141,1,3,104,141,0,3,24,96,1015
  31. 310 data 169,127,162,201,32,174,197,32,207,255,201,13,1770
  32. 320 data 240,3,170,208,246,224,85,240,12,224,67,240,1959
  33. 330 data 6,224,83,208,227,56,96,24,96,32,83,200,1335
  34. 340 data 32,17,201,32,45,197,144,243,169,109,162,201,1552
  35. 350 data 32,174,197,32,207,255,201,13,240,3,170,208,1732
  36. 360 data 246,224,78,240,4,224,89,208,231,96,133,166,1939
  37. 370 data 134,167,160,0,177,166,240,6,32,210,255,200,1747
  38. 380 data 208,246,96,200,177,122,240,36,24,152,101,122,1724
  39. 390 data 133,122,144,2,230,123,32,74,201,140,61,3,1265
  40. 400 data 141,62,3,160,0,177,122,240,21,32,253,174,1385
  41. 410 data 32,74,201,140,60,3,240,15,160,0,169,10,1104
  42. 420 data 141,61,3,140,62,3,169,10,141,60,3,32,825
  43. 430 data 60,201,32,23,198,176,18,32,106,198,32,178,1254
  44. 440 data 198,32,106,198,32,207,198,32,124,198,32,15,1372
  45. 450 data 199,32,67,201,76,116,164,32,116,198,160,3,1364
  46. 460 data 177,170,145,180,136,177,170,145,180,136,173,62,1851
  47. 470 data 3,145,180,136,173,61,3,145,180,24,165,180,1395
  48. 480 data 105,4,133,180,144,2,230,181,32,146,198,144,1499
  49. 490 data 11,160,3,169,0,145,180,136,16,251,24,96,1191
  50. 500 data 173,60,3,109,61,3,141,61,3,144,195,238,1191
  51. 510 data 62,3,173,62,3,201,250,208,185,169,85,162,1563
  52. 520 data 201,32,174,197,56,96,169,254,133,180,169,159,1820
  53. 530 data 133,181,208,8,169,0,133,180,169,160,133,181,1655
  54. 540 data 165,43,133,170,165,44,133,171,160,0,177,170,1531
  55. 550 data 141,63,3,200,177,170,141,64,3,96,160,0,1218
  56. 560 data 173,63,3,133,170,173,64,3,133,171,177,170,1433
  57. 570 data 141,63,3,200,177,170,141,64,3,13,63,3,1041
  58. 580 data 208,2,56,96,24,96,160,2,177,180,145,170,1316
  59. 590 data 200,177,180,145,170,32,146,198,176,12,165,180,1781
  60. 600 data 105,4,133,180,144,232,230,181,208,228,96,56,1797
  61. 610 data 165,45,229,43,141,67,3,165,46,229,44,141,1318
  62. 620 data 68,3,56,169,255,237,67,3,133,164,133,180,1468
  63. 630 data 169,159,237,68,3,133,165,133,181,165,43,133,1589
  64. 640 data 166,165,44,133,167,169,96,141,14,201,32,220,1548
  65. 650 data 200,169,76,141,14,201,165,180,133,164,165,181,1789
  66. 660 data 133,165,96,160,4,132,168,132,169,177,164,145,1645
  67. 670 data 170,136,16,249,164,168,177,164,208,68,164,169,1853
  68. 680 data 145,170,200,24,152,160,0,101,170,145,170,170,1607
  69. 690 data 165,171,105,0,200,145,170,134,170,133,171,164,1728
  70. 700 data 168,200,152,24,101,164,133,164,169,0,101,165,1541
  71. 710 data 133,165,160,0,177,164,200,17,164,208,188,145,1721
  72. 720 data 170,136,16,251,24,169,2,101,170,133,45,165,1382
  73. 730 data 171,105,0,133,46,96,164,169,145,170,230,168,1597
  74. 740 data 230,169,164,168,201,137,240,12,201,141,240,8,1911
  75. 750 data 201,167,240,4,169,0,240,156,162,0,177,164,1680
  76. 760 data 201,48,144,11,201,58,176,7,157,75,3,232,1313
  77. 770 data 200,208,239,224,0,240,45,132,168,142,69,3,1670
  78. 780 data 177,164,201,44,240,2,169,0,141,125,199,32,1494
  79. 790 data 202,199,32,234,199,32,41,200,162,0,164,169,1634
  80. 800 data 189,85,3,240,6,145,170,200,232,208,245,132,1855
  81. 810 data 169,76,28,199,201,32,208,249,240,198,169,0,1769
  82. 820 data 174,69,3,157,75,3,169,75,133,122,169,3,1152
  83. 830 data 133,123,32,67,201,32,74,201,140,71,3,141,1218
  84. 840 data 72,3,32,60,201,96,32,60,201,169,0,133,1059
  85. 850 data 180,169,160,133,181,173,72,3,160,3,209,180,1623
  86. 860 data 144,29,208,9,136,173,71,3,209,180,240,21,1423
  87. 870 data 200,165,180,24,105,4,133,180,144,2,230,181,1548
  88. 880 data 177,180,136,17,180,208,218,56,96,160,1,177,1606
  89. 890 data 180,153,71,3,136,16,248,24,96,32,67,201,1227
  90. 900 data 172,71,3,173,72,3,133,98,132,99,162,144,1262
  91. 910 data 56,32,73,188,32,221,189,32,60,201,162,0,1246
  92. 920 data 189,1,1,157,85,3,240,3,232,208,245,142,1506
  93. 930 data 70,3,96,164,168,152,72,24,101,170,133,164,1317
  94. 940 data 133,166,165,171,105,0,133,165,133,167,56,165,1559
  95. 950 data 45,229,166,141,67,3,165,46,229,167,141,68,1467
  96. 960 data 3,56,173,69,3,237,70,3,72,144,82,208,1120
  97. 970 data 29,104,141,65,3,104,56,237,65,3,72,168,1047
  98. 980 data 174,70,3,136,202,189,85,3,145,170,224,0,1401
  99. 990 data 208,245,104,133,168,96,141,65,3,56,165,164,1548
  100. 1000 data 237,65,3,133,164,176,2,198,165,160,0,174,1477
  101. 1010 data 68,3,240,14,177,166,145,164,200,208,249,230,1864
  102. 1020 data 167,230,165,202,208,242,174,67,3,240,186,177,2061
  103. 1030 data 166,145,164,200,202,208,248,240,176,73,255,56,2133
  104. 1040 data 101,164,133,164,144,2,230,165,173,68,3,72,1419
  105. 1050 data 24,101,165,133,165,104,24,101,167,133,167,172,1456
  106. 1060 data 67,3,240,9,136,177,166,145,164,192,0,208,1507
  107. 1070 data 247,174,68,3,240,16,198,167,198,165,136,177,1789
  108. 1080 data 166,145,164,192,0,208,247,202,208,240,76,129,1977
  109. 1090 data 200,173,69,3,205,70,3,208,1,96,165,170,1363
  110. 1100 data 164,171,32,55,165,24,165,34,105,2,133,45,1095
  111. 1110 data 165,35,105,0,133,46,160,0,177,170,141,63,1195
  112. 1120 data 3,200,177,170,141,64,3,96,165,1,41,254,1315
  113. 1130 data 133,1,96,165,1,9,1,133,1,96,32,121,789
  114. 1140 data 0,32,107,169,164,20,165,21,96,13,18,76,881
  115. 1150 data 73,78,69,32,78,85,77,66,69,82,83,32,824
  116. 1160 data 84,79,79,32,66,73,71,146,0,13,18,67,728
  117. 1170 data 79,78,84,73,78,85,69,32,89,47,78,63,855
  118. 1180 data 146,32,0,13,18,85,61,85,80,68,65,84,737
  119. 1190 data 69,32,67,61,67,79,78,84,73,78,85,69,842
  120. 1200 data 32,83,61,83,84,79,80,146,32,0,190,197,1067
  121. 1210 data 78,196,74,196,10,196,82,69,78,85,205,70,1339
  122. 1220 data 73,78,196,67,72,65,78,71,197,82,69,83,1131
  123. 1230 data 69,212,0,0,0,0,0,0,0,0,0,0,281
  124. 2000 sa=50176:be=sa:l=10:nl=123
  125. 2010 print"loading...":print
  126. 2020 fori=1tonl:cs=0
  127. 2030 forj=0to11:readk:ifk>255then3020
  128. 2040 pokesa+j,k:cs=cs+k:next
  129. 2050 readlt:iflt<>csthen3020
  130. 2060 sa=sa+12:l=l+10:next
  131. 2070 printchr$(17)spc(9)"commodore 64 basicaid"
  132. 2080 printchr$(17)spc(12)"by robin franzel"
  133. 2090 printchr$(17)spc(5)"adds renum, find, and change"
  134. 3000 printchr$(17)spc(8)"to your basic commands"
  135. 3010 sysbe:new
  136. 3020 print"error in data statement #";l
  137.